home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1993 January / 1993-01.d64 / faster 64 (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  774b  |  25 lines
  1. 0 clr
  2. 100 rem 64 mode fast and slow
  3. 110 for i=828 to 976:read d:c=c+d:next
  4. 120 if c<>15057 then print "error in data statements":end
  5. 130 sys 945
  6. 140 data 160,1,177,122,201,70,240,7
  7. 150 data 201,83,240,54,108,224,3,200
  8. 160 data 177,122,201,65,240,3,76,72
  9. 170 data 3,200,177,122,201,83,240,3
  10. 180 data 76,72,3,200,177,122,201,84
  11. 190 data 240,3,76,72,3,32,115,0
  12. 200 data 32,115,0,32,115,0,32,115
  13. 210 data 0,169,3,141,48,208,76,72
  14. 220 data 3,234,200,177,122,201,76,240
  15. 230 data 3,76,72,3,200,177,122,201
  16. 240 data 79,240,3,76,72,3,200,177
  17. 250 data 122,201,87,240,3,76,72,3
  18. 260 data 32,115,0,32,115,0,32,115
  19. 270 data 0,32,115,0,169,0,141,48
  20. 280 data 208,76,72,3,234,173,8,3
  21. 290 data 201,60,240,21,141,224,3,173
  22. 300 data 9,3,141,225,3,169,60,141
  23. 310 data 8,3,169,3,141,9,3,96
  24. 320 data 234,76,208,3,96
  25.